home *** CD-ROM | disk | FTP | other *** search
- REM $INCLUDE: 'fastgraf.bi'
-
- DEFINT A-Z
-
- OldMode = FGgetmode
- FGsetmode 13
-
- Matrix$ = CHR$(&h55) + CHR$(&hAA) + CHR$(&h55) + CHR$(&hAA)
- FGsetcolor 9
- FGdrect 0, 49, 0, 49, Matrix$
-
- Matrix$ = CHR$(&hAA) + CHR$(&h55) + CHR$(&hAA) + CHR$(&h55)
- FGsetcolor 15
- FGdrect 0, 49, 0, 49, Matrix$
- FGwaitkey
-
- FGsetmode OldMode
- FGreset
-
- END